Select Case k(i)
Case Is = 48
c(i) = 244
Case Is = 49
c(i) = 249
Case Is = 50
c(i) = 250
Case Is = 51
c(i) = 251
Case Is = 52
c(i) = 252
Case Is = 53
c(i) = 253
Case Is = 54
c(i) = 254
Case Is = 55
c(i) = 255
Case Is = 56
c(i) = 242
Case Is = 57
c(i) = 243
Case Is = 224
c(i) = 245
Case Is = 225
c(i) = 246
Case Is = 226
c(i) = 247
Case Is = 227
c(i) = 248
Case Is = 228
c(i) = 235
Case Is = 229
c(i) = 236
Case Is = 230
c(i) = 237
Case Is = 231
c(i) = 238
Case Is = 232
c(i) = 239
Case Is = 233
c(i) = 240
Case Is = 234
c(i) = 241
Case Is = 244
c(i) = 48
Case Is = 249
c(i) = 49
Case Is = 250
c(i) = 50
Case Is = 251
c(i) = 51
Case Is = 252
c(i) = 52
Case Is = 253
c(i) = 53
Case Is = 254
c(i) = 54
Case Is = 255
c(i) = 55
Case Is = 242
c(i) = 56
Case Is = 243
c(i) = 57
Case Is = 245
c(i) = 224
Case Is = 246
c(i) = 225
Case Is = 247
c(i) = 226
Case Is = 248
c(i) = 227
Case Is = 235
c(i) = 228
Case Is = 236
c(i) = 229
Case Is = 237
c(i) = 230
Case Is = 238
c(i) = 231
Case Is = 239
c(i) = 232
Case Is = 240
c(i) = 233
Case Else
c(i) = k(i)
End Select